home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Software Vault: The Gold Collection
/
Software Vault - The Gold Collection (American Databankers) (1993).ISO
/
cdr46
/
be310.zip
/
LEAP.CHS
< prev
next >
Wrap
Text File
|
1993-06-01
|
1KB
|
29 lines
/* CHESS FUNCTION(S): leap_forward, leap_backward
/* DATE: 3/1/93
/* AUTHOR: C. Schanck
/*
/* DESCRIPTION: these two functions mimic the functionality of
/* the 'leap_' functions which were dropped after version 3.00 (They
/* were replaced by the 'isearch' function. They simply find the
/* next occurance of a specified character, the current char
/* included.
leap_forward{ /* leap forward
int i;
char buf[2];
msg("Leap forward to what char?"); /* prompt for character
buf[0]=getkey()%256; /* get the char
buf[1]=0; /* terminate the string
/* now search for the target, with case sensitivity off!
return(b_cmd("search",str(buf),key("return"),str(""),key("return")));
}
leap_backward{
int i;
char buf[2];
msg("Leap back to what char?"); /* prompt for character
buf[0]=getkey()%256; /* get the char
buf[1]=0; /* terminate the string
/* now search for the target, with case sensitivity off! backwards...
return(b_cmd("search",str(buf),key("return"),str("b"),key("return")));
}